use "d:/Users/Andrey/Dropbox/data/fcpa/replication/country level final.dta", clear
cd d:/Users/Andrey/Dropbox/data/fcpa/replication

log using countrylevel, text replace
*** Figure 2
graph bar fcpasum if fcpasum>5, over(CountryAbb, sort(1) descending label(angle(45))) scheme(s2mono) graphregion(fcolor(white)) yti(FCPA Enforcement Actions)

*** Table 1 ***

xtlogit fcpaact polity2 mou fcpasum2 PctAgreeUS c.lusfdi  lgdppc lustrade cpi  if  ccode !=2 , fe
		estimates store m1

xtlogit fcpaact polity2 mou fcpasum2 c.s_un_atop c.lusfdi  lgdppc lustrade cpi  if ccode !=2 , fe
		estimates store m2

xtlogit fcpaact polity2 mou fcpasum2  c.leconaidfrac c.lusfdi  lgdppc lustrade cpi  if ccode !=2 , fe
		estimates store m3

xtlogit fcpaact polity2 mou fcpasum2 c.lmilaidfrac c.lusfdi  lgdppc lustrade cpi   if ccode !=2 , fe 
		estimates store m4

xtlogit fcpaact polity2 mou fcpasum2 c.larmsfrac c.lusfdi  lgdppc lustrade cpi    if  ccode !=2 , fe
		estimates store m5
  
*** Table 2 ***

xtreg fcpaact polity2 fcpasum2 mou  PctAgreeUS lusfdi  lgdppc lustrade cpi   i.year  if ccode !=2 ,fe cluster(ccode)  
		estimates store m6
		
xtreg fcpaact polity2 fcpasum2 mou  s_un_atop lusfdi  lgdppc lustrade cpi  i.year if  ccode !=2 , fe cluster(ccode) 
    	estimates store m7

xtreg fcpaact polity2 fcpasum2 mou  lmilaidfrac  lusfdi  lgdppc lustrade cpi   i.year  if  ccode !=2 , fe cluster(ccode) 
		estimates store m8

xtreg fcpaact polity2 fcpasum2 mou  leconaidfrac  lusfdi  lgdppc lustrade cpi i.year  if ccode !=2 , fe cluster(ccode)  
		estimates store m9

xtreg fcpaact polity2 fcpasum2 mou  larmsfrac lusfdi  lgdppc lustrade cpi  i.year if ccode !=2 ,fe cluster(ccode)  
		estimates store m10
		

*** Table 5 ***		
		
zinb debarsum fcpasum2 polity2 mou  PctAgreeUS c.lusfdi  lgdppc ltrade cpi  if year>2009 &ccode!=2, difficult inflate( polity2 mou PctAgreeUS  c.lusfdi  lgdppc ltrade cpi fcpasum2) cluster(ccode)
		estimates store m11
		
zinb debarsum fcpasum2 polity2 mou   s_un_atop c.lusfdi  lgdppc ltrade cpi  if year>2009 &ccode!=2, difficult inflate( polity2 mou  s_un_atop  c.lusfdi  lgdppc ltrade cpi fcpasum2) cluster(ccode) 
		estimates store m12

zinb debarsum fcpasum2 polity2 mou  c.lmilaidfrac c.lusfdi  lgdppc ltrade cpi  if year>2009 &ccode!=2, difficult inflate( polity2 mou c.lmilaidfrac  c.lusfdi  lgdppc ltrade cpi fcpasum2) cluster(ccode)
		estimates store m13
		
zinb debarsum fcpasum2 polity2 mou leconaidfrac  c.lusfdi  lgdppc ltrade cpi  if year>2009 &ccode!=2, difficult inflate( polity2 mou leconaidfrac   c.lusfdi  lgdppc ltrade cpi fcpasum2) cluster(ccode)
		estimates store m14

zinb debarsum fcpasum2 polity2 mou  c.larmsfrac c.lusfdi  lgdppc ltrade cpi  if year>2009 &ccode!=2, difficult inflate( polity2 mou c.larmsfrac  c.lusfdi  lgdppc ltrade cpi fcpasum2)  cluster(ccode)
		estimates store m15
		
zinb debarsum fcpasum2 polity2 mou  c.larmsfrac c.lusfdi  lgdppc ltrade cpi  if year>2009 &ccode!=2, difficult inflate( polity2 mou c.larmsfrac  c.lusfdi  lgdppc ltrade cpi fcpasum2)  forcevuong zip

log close